Add another iso-transl entry for Euro character

* lisp/international/iso-transl.el (iso-transl-char-map): Add 'C-x 8 E'
to align with the other currency characters.

* etc/NEWS: Announce it.

diff --git a/etc/NEWS b/etc/NEWS
index d4d8ee87dec2b5e91329de5154ca4aa7470e38fc..5a1f7f3e4438fceaf7e9c65f6bb35aec39ebf639 100644 (file)
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -616,6 +616,10 @@ respectively, after activating French language support via
 'iso-transl-set-language'.  Double guillemets were already supported via
 'C-x 8 <' and 'C-x 8 >'
 
+*** Additional 'C-x 8' key translation for Euro "€" currency symbol.
+This can now be entered using 'C-x 8 E' in addition to the existing
+'C-x 8 * E' translation.
+
 \f
 * Changes in Specialized Modes and Packages in Emacs 30.1
 

diff --git a/lisp/international/iso-transl.el b/lisp/international/iso-transl.el
index a3f2dfb9f9e3e67ef21ebdf30b8799bd6c8ff46e..33a87b51e43a328d545bb1c83a904906381e51fb 100644 (file)
--- a/lisp/international/iso-transl.el
+++ b/lisp/international/iso-transl.el
@@ -164,6 +164,8 @@
     ("?"    . [?¿])
     ("*C"   . [?©])
     ("C"    . [?©])
+    ("*E"   . [?€])
+    ("E"    . [?€])
     ("*L"   . [?£])
     ("L"    . [?£])
     ("*P"   . [?¶])
@@ -290,7 +292,6 @@
     ("**"   . [?•])
     ("*'"   . [?′])
     ("*\""  . [?″])
-    ("*E"   . [?€])
     ("No"   . [?№])
     ("a<"   . [?←])
     ("a>"   . [?→])